menu menubar, {
  .mIRC MsN Dialog:/dialog -m channel channel
}

alias gettotnicks {
  var %i $chan(0) , %tot
  while (%i) {
    %tot = $calc(%tot + $nick($chan(%i),0))
    .dec %i
  }
  .amsg I am opp'd in $chan(0) $+ / $+ $chan(0) chan'z and have power over %tot of you little biatch's. | /echo -a I am opp'd in $chan(0) $+ / $+ $chan(0) chan'z and have power over %tot of you little biatch's.
}

dialog channel {
  title "MsN Mirc Dialog"
  option dbu
  size -1 -1 120 115
  button "Close",174, 45 99 28 15, OK
  tab "Modes",1 ,7 1 105 95
  tab "Channel",2
  tab "Loads",3
  text "Spec:",4, 10 20 27 20, tab 1
  button "+",5, 35 19 9 8, tab 1
  button "-",6, 44 19 9 8, tab 1
  text "Invite:",7, 10 28 30 20, tab 1
  button "+",8, 35 27 9 8, tab 1
  button "-",9, 44 27 9 8, tab 1
  text "Whisper:",10, 10 36 44 15, tab 1
  button "+",11, 35 35 9 8, tab 1
  button "-",12, 44 35 9 8, tab 1
  text "Knock:",13, 10 44 44 15, tab 1
  button "+",14, 35 43 9 8, tab 1
  button "-",15, 44 43 9 8, tab 1
  text "Secret:",16, 10 52 44 15, tab 1
  button "+",17, 35 51 9 8, tab 1
  button "-",18, 44 51 9 8, tab 1
  text "Private:",19, 10 60 45 15, tab 1
  button "+",20, 35 59 9 8, tab 1
  button "-",21, 44 59 9 8, tab 1
  text "+k-prot:",22, 10 68 45 15, tab 1
  button "+k",23, 35 67 9 8, tab 1
  button "-k",24, 44 67 9 8, tab 1
  text "+l-limit:",25, 10 76 45 15, tab 1
  button "+l",26, 35 75 9 8, tab 1
  button "-l",27, 44 75 9 8, tab 1
  box "",28, 57 16 51 65, tab 1
  text "Advertise:",29, 10 84 45 9, tab 1
  button "advertise",30, 35 83 25 8, tab 1
  text "Faces:",31, 59 23 44 15, tab 1
  button "Faces",32, 85 22 20 9, tab 1
  text "owner-stats:",33, 59 32 30 9, tab 1
  button "stats",34, 90 31 15 9, tab 1
  text "echo-topic:",35, 59 41 40 9, tab 1
  button "echo",36, 90 40 15 9, tab 1
  text "echo-modes:",37, 59 50 40 9, tab 1
  button "echo",38, 90 49 15 9, tab 1
  text "echo.+q:",39, 59 59 35 9, tab 1
  button "echo",40, 90 58 15 9, tab 1
  text "echo.+o:",41, 59 68 35 9, tab 1
  button "echo",42, 90 67 15 9, tab 1
  box "Channel",43, 14 15 90 78, tab 2
  text "prop.+q.key:",44, 18 25 30 20, tab 2
  button "+q",45, 51 24 14 9, tab 2
  text "prop.+o.key:",46, 18 34 30 20, tab 2
  button "+o",47, 51 33 14 9, tab 2
  text "onjoin-msg:",48, 18 43 30 20, tab 2
  button "msg",49, 51 42 14 9, tab 2
  text "onpart-msg:",50, 18 53 30 20, tab 2
  button "msg",51, 51 51 14 9, tab 2 
  text "language:",52, 18 62 30 20, tab 2
  button "language",53, 51 60 25 9, tab 2
  text "away&sys:",54, 18 71 30 20, tab 2
  button "Away",55, 51 69 23 9, tab 2
  button "Back",56, 74 69 23 9, tab 2
  text "enter-pass:",57, 18 80 30 9, tab 2
  button "Enter",58, 51 78 23 9, tab 2
  text "No.+q.pass",59, 69 24 30 9, tab 2
  button "null",60, 74 32 15 8, tab 2
  text "No.+o.pass",61, 69 41 30 9, tab 2
  button "null",62, 74 49 15 8, tab 2
  box "Loads/Unloads",63, 14 15 90 78, tab 3
  text "GUEST-PROTECTION",64, 32 26 60 20, tab 3
  button "On",65, 45 34 15 9, tab 3
  button "Off",66, 60 34 15 9, tab 3
  text "FLOOD-PROTECTION",67, 32 45 60 20, tab 3
  button "On",68, 45 53 15 9, tab 3
  button "Off",69, 60 53 15 9, tab 3
  text "Mp3:",70, 64 84 20 9, tab 1
  button "mp3",71, 80 83 15 8, tab 1
  text "CAPS-PROTECTION",72, 34 65 60 20, tab 3
  button "On",73, 45 72 15 9, tab 3
  button "Off",74, 60 72 15 9, tab 3
  noborder;
}

On *:Dialog:channel:sclick:5:{ mode $active +m }
On *:Dialog:channel:sclick:6:{ mode $active -m }
On *:Dialog:channel:sclick:8:{ mode $active +i }
On *:Dialog:channel:sclick:9:{ mode $active -i }
On *:Dialog:channel:sclick:11:{ mode $active +w }
On *:Dialog:channel:sclick:12:{ mode $active -w }
On *:Dialog:channel:sclick:14:{ mode $active +u }
On *:Dialog:channel:sclick:15:{ mode $active -u }
On *:Dialog:channel:sclick:17:{ mode $active +s }
On *:Dialog:channel:sclick:18:{ mode $active -s }
On *:Dialog:channel:sclick:20:{ mode $active +p }
On *:Dialog:channel:sclick:21:{ mode $active -p }
On *:Dialog:channel:sclick:23:{ mode $active +k $$?="Set +k key" }
On *:Dialog:channel:sclick:24:{ mode $active -k $$?="Unset +k key" }
On *:Dialog:channel:sclick:26:{ mode $active +l $$?="Set room limit" }
On *:Dialog:channel:sclick:27:{ mode $active -l $$?="set lower limit" }
On *:Dialog:channel:sclick:30:{ msg $active 14I am useing 0[14MsN Mirc Dialog0]14 made by Brad aka Icey_Cold. 0[14Advertise0] }
On *:Dialog:channel:sclick:32:{ msg $active 0[14Random Faces0] 1012,8:4,8O 1212,84,8) 1212,84,8D 912,8:4,8( 612,8:4,8| 512,8:4,8@ 1312,8:4,8s 1112,8:4,8p }
On *:Dialog:channel:sclick:34:{ .gettotnicks }
On *:Dialog:channel:sclick:36:{ echo -a The chat topic in $active is: $chan($active).topic }
On *:Dialog:channel:sclick:38:{ echo -a The current modes set in $active are: $chan($active).mode }
On *:Dialog:channel:sclick:40:{ echo -a There are currently $nick($active $+ ,0,q) owners in $active }
On *:Dialog:channel:sclick:42:{ echo -a There are currently $nick($active $+ ,0,o) ops in $active }
On *:Dialog:channel:sclick:45:{ prop # +q $me $$?="Enter +q key here" }
On *:Dialog:channel:sclick:47:{ prop $active hostkey $$?="Enter +o key here" }
On *:Dialog:channel:sclick:49:{ prop $active onjoin : $$?="Enter onjoin msg here" }
On *:Dialog:channel:sclick:51:{ prop $active onpart : $$?="Enter onpart msg here" }
On *:Dialog:channel:sclick:53:{ prop $active LANGUAGE $$?="Enter language # here" }
On *:Dialog:channel:sclick:55:{ set %Away.Reason $$?="Enter Away Reason" | set %away.dur $ctime | away %Away.Reason | timeraway 0 500 ame away0;0 (14 $+ %Away.Reason $+ 0) 14Ip15;14 On: 0L14eft; $time(h:nntt) | /ame away0;0 (14 $+ %Away.Reason $+ 0) 14Ip15;14 On: 0L14eft0;14 $time(h:nntt) }
On *:Dialog:channel:sclick:56:{ timeraway off | ame back0;0 (14 $+ %Away.Reason $+ 0) 14Ip15;14 Off: 0G14one0:14 $duration($calc($ctime - %away.dur)) | away | unset %Away.Reason %Away.Back }
On *:Dialog:channel:sclick:58:{ mode $me +h $$?="Enter pass" }
On *:Dialog:channel:sclick:60:{ raw -q prop $active ownerkey : }
On *:Dialog:channel:sclick:62:{ raw -q prop $active hostkey : }
On *:Dialog:channel:sclick:65:{ load -rs guestkick.txt | echo -a guestkick loaded }
On *:Dialog:channel:sclick:66:{ unload -rs guestkick.txt | echo -a guestkick unloaded }
On *:Dialog:channel:sclick:68:{ load -rs floodkick.txt | echo -a flookick loaded }
On *:Dialog:channel:sclick:69:{ unload -rs floodkick.txt | echo -a floodkick unloaded }
On *:Dialog:channel:sclick:71:{ .jukebox }
On *:Dialog:channel:sclick:73:{ load -rs caps-kick.txt | /echo -a caps kick loaded }
On *:Dialog:channel:sclick:74:{ unload -rs caps-kick.txt | /echo -a caps kick unloaded }
